object Form24: TForm24 Left = 320 Top = 90 BorderStyle = bsNone Caption = 'M��teri Talepleri' ClientHeight = 480 ClientWidth = 640 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Image1: TImage Left = 0 Top = 0 Width = 640 Height = 480 AutoSize = True Picture.Data = {} OnMouseDown = Image1MouseDown end object Label1: TLabel Left = 40 Top = 288 Width = 42 Height = 13 Caption = 'Semt Ad�' Transparent = True end object Label3: TLabel Left = 40 Top = 336 Width = 56 Height = 13 Caption = 'Fiyat De�eri' Transparent = True end object Label5: TLabel Left = 312 Top = 336 Width = 31 Height = 13 Caption = 'De�eri' Transparent = True end object Image2: TImage Left = 288 Top = 332 Width = 13 Height = 15 AutoSize = True Picture.Data = {} Transparent = True end object Image3: TImage Left = 72 Top = 408 Width = 151 Height = 38 AutoSize = True Picture.Data = {} Visible = False end object Image4: TImage Left = 248 Top = 408 Width = 151 Height = 38 AutoSize = True Picture.Data = {} Visible = False end object Image5: TImage Left = 416 Top = 408 Width = 151 Height = 38 AutoSize = True Picture.Data = {} Visible = False end object Label8: TLabel Left = 80 Top = 416 Width = 137 Height = 25 Alignment = taCenter AutoSize = False Caption = 'Bul' Font.Charset = DEFAULT_CHARSET Font.Color = clLime Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True OnMouseDown = Label8MouseDown OnMouseUp = Label8MouseUp end object Label9: TLabel Left = 256 Top = 416 Width = 137 Height = 25 Alignment = taCenter AutoSize = False Caption = 'T�m�n� G�ster' Font.Charset = DEFAULT_CHARSET Font.Color = clLime Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True OnMouseDown = Label9MouseDown OnMouseUp = Label9MouseUp end object Label10: TLabel Left = 424 Top = 416 Width = 137 Height = 25 Alignment = taCenter AutoSize = False Caption = 'Yazd�r' Font.Charset = DEFAULT_CHARSET Font.Color = clLime Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True OnMouseDown = Label10MouseDown OnMouseUp = Label10MouseUp end object Label11: TLabel Left = 488 Top = 280 Width = 116 Height = 13 Caption = 'Arama Se�ene�ini Se�in' Transparent = True end object Image6: TImage Left = 536 Top = 32 Width = 30 Height = 28 AutoSize = True Picture.Data = {} OnMouseDown = Image6MouseDown OnMouseUp = Image6MouseUp end object Image7: TImage Left = 568 Top = 32 Width = 30 Height = 28 AutoSize = True Picture.Data = {} OnMouseDown = Image7MouseDown OnMouseUp = Image7MouseUp end object Image8: TImage Left = 536 Top = 32 Width = 30 Height = 28 AutoSize = True Picture.Data = {} Visible = False end object Image9: TImage Left = 568 Top = 32 Width = 30 Height = 28 AutoSize = True Picture.Data = {} Visible = False end object Label12: TLabel Left = 144 Top = 352 Width = 38 Height = 13 Caption = 'Label12' Transparent = True Visible = False end object Label14: TLabel Left = 288 Top = 288 Width = 31 Height = 13 Caption = 'Durum' Transparent = True end object Image11: TImage Left = 248 Top = 365 Width = 149 Height = 34 AutoSize = True Picture.Data = {} end object Image12: TImage Left = 248 Top = 363 Width = 151 Height = 38 AutoSize = True Picture.Data = {} Visible = False end object Label2: TLabel Left = 252 Top = 376 Width = 145 Height = 25 Alignment = taCenter AutoSize = False Caption = 'Kar��la�t�r' Font.Charset = DEFAULT_CHARSET Font.Color = clLime Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True OnMouseDown = Label2MouseDown OnMouseUp = Label2MouseUp end object DBGrid1: TDBGrid Left = 40 Top = 64 Width = 561 Height = 201 DataSource = DataSource1 Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit] ReadOnly = True TabOrder = 0 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'MS Sans Serif' TitleFont.Style = [] OnDblClick = DBGrid1DblClick Columns = < item Expanded = False FieldName = 'Isim' Visible = True end item Expanded = False FieldName = 'Emlak' Width = 114 Visible = True end item Expanded = False FieldName = 'Semtadi' Title.Caption = 'Semt Ad�' Width = 108 Visible = True end item Expanded = False FieldName = 'IlkMetre2' Title.Caption = 'Ilk Metre2' Width = 61 Visible = True end item Expanded = False FieldName = 'Ikincimetre2' Title.Caption = '�kinci metre2' Visible = True end item Expanded = False FieldName = 'Fiyatilkdeger' Title.Caption = 'Fiyat �lk De�er' Width = 76 Visible = True end item Expanded = False FieldName = 'Ikincifiyat' Title.Caption = '�kinci Fiyat' Width = 77 Visible = True end item Expanded = False FieldName = 'Isisistemi' Title.Caption = 'Is� Sistemi' Width = 68 Visible = True end item Expanded = False FieldName = 'Kat' Visible = True end item Expanded = False FieldName = 'Oda' Width = 48 Visible = True end> end object Edit1: TEdit Left = 144 Top = 328 Width = 121 Height = 21 MaxLength = 17 TabOrder = 1 OnExit = Edit1Exit OnKeyPress = Edit1KeyPress OnKeyUp = Edit1KeyUp end object Edit3: TEdit Left = 352 Top = 328 Width = 121 Height = 21 MaxLength = 10 TabOrder = 2 OnKeyPress = Edit1KeyPress end object DBLookupComboBox1: TDBLookupComboBox Left = 144 Top = 280 Width = 121 Height = 21 KeyField = 'Semtler' ListField = 'Semtler' ListSource = DataSource2 TabOrder = 3 end object lb1: TListBox Left = 488 Top = 292 Width = 113 Height = 97 Hint = 'Se�ti�ini Se�ene�e G�re Arama Yapma' ItemHeight = 13 Items.Strings = ( 'Semt Ad�na G�re' 'Fiyata G�re' 'Metre Kareye G�re' 'Semt ve Fiyata G�re' 'Semt ve Metreye G�re' 'Fiyat ve Metreye G�re' 'T�m�ne G�re') ParentShowHint = False ShowHint = True TabOrder = 4 end object ComboBox1: TComboBox Left = 352 Top = 280 Width = 121 Height = 21 ItemHeight = 13 TabOrder = 5 Text = 'T�m�' Items.Strings = ( 'Buldu' 'Bulamad�' 'T�m�') end object DataSource1: TDataSource DataSet = Query1 Left = 24 Top = 16 end object DataSource2: TDataSource DataSet = Table2 Left = 184 Top = 24 end object Table2: TTable Active = True TableName = 'semtler.db' Left = 216 Top = 24 object Table2No: TAutoIncField FieldName = 'No' ReadOnly = True end object Table2Semtler: TStringField FieldName = 'Semtler' Size = 15 end end object Query1: TQuery Active = True AutoRefresh = True DataSource = Form2.DataSource1 SQL.Strings = ( 'select * from musteritalepleri') Left = 80 Top = 24 object Query1No: TIntegerField FieldName = 'No' end object Query1IlkMetre2: TFloatField FieldName = 'IlkMetre2' end object Query1Ikincimetre2: TFloatField FieldName = 'Ikincimetre2' end object Query1Ikincifiyat: TCurrencyField FieldName = 'Ikincifiyat' end object Query1Kat: TStringField FieldName = 'Kat' Size = 6 end object Query1Fiyatilkdeger: TCurrencyField FieldName = 'Fiyatilkdeger' end object Query1Oda: TStringField FieldName = 'Oda' end object Query1Isisistemi: TStringField FieldName = 'Isisistemi' end object Query1Emlak: TStringField FieldName = 'Emlak' end object Query1Durum: TStringField FieldName = 'Durum' end object Query1Semtadi: TStringField FieldName = 'Semtadi' end object Query1Isim: TStringField FieldName = 'Isim' end object Query1Telefon: TStringField FieldName = 'Telefon' end object Query1Istek: TStringField FieldName = 'Istek' Size = 15 end end end